home *** CD-ROM | disk | FTP | other *** search
/ SuperHack / SuperHack CD.bin / CODING / GRAPHICS / UVE138.ZIP / EXAMPLES.ZIP / 1ST.PAS next >
Encoding:
Pascal/Delphi Source File  |  1996-08-30  |  244 b   |  16 lines

  1. {$A+,B-,D+,E+,F-,G+,I+,L+,N-,O-,P-,Q-,R-,S+,T-,V+,X+}
  2. {$M 16384,0,655360}
  3.  
  4. {
  5. 1ST.PAS
  6. Sample init program into/out of graphics mode.
  7. }
  8.  
  9. uses     crt,uve32;
  10.  
  11. begin
  12.     ia_inituve;
  13.     ia_powerup;
  14.     repeat until keypressed;
  15.     ia_shutdown;
  16. end.